----------------------------------------------------------------------------------------
      name:  <unnamed>
       log:  /Users/paulmusgrave/Dropbox/0001 Academic Projects/Ongoing/0148 The Cyber/P
> osted/FPA Version/Work/Logs/Figure4Figure5Log.log
  log type:  text
 opened on:  25 Aug 2021, 10:37:03

. 
. cd "$path/Data/"
/Users/paulmusgrave/Dropbox/0001 Academic Projects/Ongoing/0148 The Cyber/Posted/FPA Ver
> sion/Work/Data

. use "TheCyber2019AnalysisData.dta"

. 
. lab var college "College"

. lab var female "Female"

. lab var republican3 "Republican"

. lab var democrat3 "Democrat"

. lab var independent3 "Independent"

. lab var republican7 "Republican"

. lab var democrat7 "Democrat"

. lab var independent7 "Independent"

. 
. set scheme plotplainblind

. 
. ******************************************
. * Confidence Coefficient Plots And Tables
. ******************************************
. cd "$path/Charts/"
/Users/paulmusgrave/Dropbox/0001 Academic Projects/Ongoing/0148 The Cyber/Posted/FPA Ver
> sion/Work/Charts

. 
. quietly reg confident white age college female republican7 i.target i.economic i.death
>  ///
>         i.confidence i.aggressortype i.aggressororigin i.purpose i.indconcur ///
>         i.policymakertype##i.policymakerconcur task choice, vce(cluster caseid)

. eststo confidencemodel

. 
. coefplot, drop(_cons age white college female republican7 task choice) xline(0) ///
> headings (0.target = "{bf:Target}" 0.economic = "{bf:Economic}" ///
>                 0.death = "{bf:Deaths}" 0.confidence = "{bf:Intel Community Confidence
> }" ///
>                 0.aggressortype = "{bf:Aggressor Type}" ///
>                 0.aggressororigin = "{bf:Aggressor Origin}" ///
>                 0.purpose = "{bf:Purpose}" ///
>                 0.indconcur = "{bf:Independent Experts}" ///
>                 0.policymakertype = "{bf:Policymaker ID}" ///
>                 0.policymakerconcur = "{bf:Policymaker Cue}") ///
>                 coeflabels(,labsize(tiny)) ///
>                 title("Figure 4: OLS Coefficients for" "Respondents' Confidence in Att
> ribution",size(small)) ///
>                 omitted baselevels ///
>                 xsize(6) ysize(7)

. graph export "Figure 4.pdf", replace
(file /Users/paulmusgrave/Dropbox/0001 Academic Projects/Ongoing/0148 The Cyber/Posted/F
> PA Version/Work/Charts/Figure 4.pdf written in PDF format)

.                 
.                         
. ** By party ID
. * PID7 (leaners included with Party)
. quietly reg confident white age college female  i.target i.economic i.death ///
>         i.confidence i.aggressortype i.aggressororigin i.purpose i.indconcur ///
>         i.policymakertype##i.policymakerconcur task choice if republican7 == 1, vce(cl
> uster caseid)

. eststo confidencemodelGOP

. 
. quietly reg confident white age college female  i.target i.economic i.death ///
>         i.confidence i.aggressortype i.aggressororigin i.purpose i.indconcur ///
>         i.policymakertype##i.policymakerconcur task choice if democrat7 == 1, vce(clus
> ter caseid)

. eststo confidencemodelDEM

.                 
.         
. #delimit ;
delimiter now ;
. coefplot 
>         (confidencemodelGOP, label(Republicans) offset(.08)) (confidencemodelDEM, labe
> l(Democrats) offset(-.08)), 
>         drop(_cons age white college female republican7 task choice *.target *.economi
> c *.death *.aggressortype *.aggressororigin *.purpose) ///
>                 xline(0) ///
>                 headings (0.target = "{bf:Target}" 0.economic = "{bf:Economic}" ///
>                 0.death = "{bf:Deaths}" 0.confidence = "{bf:Intel Community Confidence
> }" ///
>                 0.aggressortype = "{bf:Aggressor Type}" ///
>                 0.aggressororigin = "{bf:Aggressor Origin}" ///
>                 0.purpose = "{bf:Purpose}" ///
>                 0.indconcur = "{bf:Independent Experts}" ///
>                 0.policymakertype = "{bf:Policymaker ID}" ///
>                 0.policymakerconcur = "{bf:Policymaker Cue}") ///
>                 coeflabels(,labsize(tiny)) ///
>                 title("Figure 5: OLS Coefficients for Respondents' Confidence""in Attr
> ibution, by Party ID",size(small)) ///
>                  baselevels ///
>                 xsize(8) ysize(7) ///
>                 legend(cols(2) position(12))
> ;

. graph display, ysize(3) xsize(3)
> ;

.                                 graph export "Figure 5.pdf", replace
> ;
(file /Users/paulmusgrave/Dropbox/0001 Academic Projects/Ongoing/0148 The Cyber/Posted/F
> PA Version/Work/Charts/Figure 5.pdf written in PDF format)

. #delimit cr             
delimiter now cr
.                                 
. ** By party ID
. * PID3 (alternative specification, leaners treated as independents)
. quietly reg confident white age college female  i.target i.economic i.death ///
>         i.confidence i.aggressortype i.aggressororigin i.purpose i.indconcur ///
>         i.policymakertype##i.policymakerconcur task choice if republican3 == 1, vce(cl
> uster caseid)

. eststo confidencemodelGOP

. 
. quietly reg confident white age college female  i.target i.economic i.death ///
>         i.confidence i.aggressortype i.aggressororigin i.purpose i.indconcur ///
>         i.policymakertype##i.policymakerconcur task choice if democrat3 == 1, vce(clus
> ter caseid)

. eststo confidencemodelDEM

.                 
.         
. #delimit ;
delimiter now ;
. coefplot 
>         (confidencemodelGOP, label(Republicans) offset(.08)) (confidencemodelDEM, labe
> l(Democrats) offset(-.08)), 
>         drop(_cons age white college female republican3 task choice *.target *.economi
> c *.death *.aggressortype *.aggressororigin *.purpose) ///
>                 xline(0) ///
>                 headings (0.target = "{bf:Target}" 0.economic = "{bf:Economic}" ///
>                 0.death = "{bf:Deaths}" 0.confidence = "{bf:Intel Community Confidence
> }" ///
>                 0.aggressortype = "{bf:Aggressor Type}" ///
>                 0.aggressororigin = "{bf:Aggressor Origin}" ///
>                 0.purpose = "{bf:Purpose}" ///
>                 0.indconcur = "{bf:Independent Experts}" ///
>                 0.policymakertype = "{bf:Policymaker ID}" ///
>                 0.policymakerconcur = "{bf:Policymaker Cue}") ///
>                 coeflabels(,labsize(tiny)) ///
>                 title("OLS Coefficients for Respondents' Confidence in Attribution,""b
> y Party ID",size(small)) ///
>                  baselevels ///
>                 xsize(8) ysize(3) ///
>                 legend(cols(2) position(12))
> ;

. graph display, ysize(3) xsize(3)
> ;

.                                                 graph export AppendixConjointQualtrics
> ConjointResultsSevereConfidentByPID3.pdf, replace 
> 
> ;
(file /Users/paulmusgrave/Dropbox/0001 Academic Projects/Ongoing/0148 The Cyber/Posted/F
> PA Version/Work/Charts/AppendixConjointQualtricsConjointResultsSevereConfidentByPID3.p
> df written in PDF format)

. #delimit cr
delimiter now cr
. 
. 
. *************************************************************
. * Tables
. 
. cd "$path/Tables/"
/Users/paulmusgrave/Dropbox/0001 Academic Projects/Ongoing/0148 The Cyber/Posted/FPA Ver
> sion/Work/Tables

. 
. 
. esttab confidencemodel confidencemodelGOP confidencemodelDEM ///
>         using Fig3Fig4TablePID7.tex, ///
>         label replace nobaselevels ///
>         interaction(" X ") wrap  onecell compress ///
>         mtitles("Main Model" "Republicans" "Democrats") longtable ///
>         title("Full Results of Conjoint OLS Model")
(output written to Fig3Fig4TablePID7.tex)

.         
. 
. 
. lab var college "College"

. lab var female "Female"

. lab var republican3 "Republican"

. lab var democrat3 "Democrat"

. lab var independent3 "Independent"

. lab var republican7 "Republican"

. lab var democrat7 "Democrat"

. lab var independent7 "Independent"

. 
. gen perceivedlikely = .
(12,330 missing values generated)

. replace perceivedlikely = cyberLikelyPowerGrid if target == 3
(2,571 real changes made)

. replace perceivedlikely = cyberLikelyMilitary if target == 4
(2,721 real changes made)

. replace perceivedlikely = cyberLikelyMajorCorps if target == 0
(2,098 real changes made)

. replace perceivedlikely = cyberLikelyMajorCorps if target == 1
(2,187 real changes made)

. 
. lab var perceivedlikely "Likely Target Vulnerability"

. lab val perceivedlikely threatpossibility

. 
. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
. * By Views of Sector Vulnerability
. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
. 
. quietly reg confident i.aggressororigin i.target i.economic i.death i.confidence ///
>                 i.aggressortype i.purpose i.indconcur policymakertype##policymakerconc
> ur ///
>                 female republican7  college white age task choice, vce(cluster caseid)

. eststo confBase

.                 
. quietly reg confident i.aggressororigin i.target i.economic i.death i.confidence ///
>                 i.aggressortype i.purpose i.indconcur policymakertype##policymakerconc
> ur ///
>                 female republican7  college white age task choice i.perceivedlikely, v
> ce(cluster caseid)

. eststo conflikely

. 
. esttab confBase conflikely  ///
>         using AppendixConjointQualtricsOLSConfidenceSevereLikely.tex, ///
>         label replace  ///
>         interaction(" X ") wrap  onecell compress ///
>         mtitles("Attribution (Base)" "Attribution (Sector)" ) ///
>         title("By View of Sectoral Vulnerability") longtable
(output written to AppendixConjointQualtricsOLSConfidenceSevereLikely.tex)

.         
. 
. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * 
. * By Threat and Warmth, OLS/Confident + Severe 
. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
.         
.         
. *** Confident
. 
. drop if aggressororigin == 5
(1,839 observations deleted)

. 
.         
. quietly reg confident ///
>                         white age college female republican7 ///
>                         i.target i.economic i.death i.confidence ///
>                         i.aggressortype b1.aggressororigin i.purpose i.indconcur ///
>                         i.policymakertype##i.policymakerconcur ///
>                         task choice ///
>                         , vce(cluster caseid)

. eststo confAdjBase

.         
. quietly reg confident ///
>                         white age college female republican7 ///
>                         i.target i.economic i.death i.confidence ///
>                         i.aggressortype b1.aggressororigin  i.purpose i.indconcur ///
>                         i.policymakertype##i.policymakerconcur ///
>                         task choice ///
>                         threat, vce(cluster caseid) 

. eststo confThreat

. 
. quietly reg confident ///
>                         white age college female republican7 ///
>                         i.target i.economic i.death i.confidence ///
>                         i.aggressortype b1.aggressororigin  i.purpose i.indconcur ///
>                         i.policymakertype##i.policymakerconcur ///
>                         task choice ///
>                         warmth, vce(cluster caseid) 

. eststo confWarmth

. 
. quietly reg confident ///
>                         white age college female republican7 ///
>                         i.target i.economic i.death i.confidence ///
>                         i.aggressortype b1.aggressororigin  i.purpose i.indconcur ///
>                         i.policymakertype##i.policymakerconcur ///
>                         task choice ///
>                         threat warmth, vce(cluster caseid) 

. eststo confThreatWarmth

. 
. quietly reg confident ///
>                         white age college female republican7 ///
>                         i.target i.economic i.death i.confidence ///
>                         i.aggressortype b1.aggressororigin  i.purpose i.indconcur ///
>                         i.policymakertype##i.policymakerconcur ///
>                         task choice ///
>                         threat warmth if democrat7 == 1, vce(cluster caseid) 

. eststo confThreatWarmthDem

. 
. quietly reg confident ///
>                         white age college female republican7 ///
>                         i.target i.economic i.death i.confidence ///
>                         i.aggressortype b1.aggressororigin  i.purpose i.indconcur ///
>                         i.policymakertype##i.policymakerconcur ///
>                         task choice ///
>                         threat warmth if republican7 == 1, vce(cluster caseid) 

. eststo confThreatWarmthRep

. 
. esttab confAdjBase confThreat  ///
>         confWarmth confThreatWarmth ///
>         confThreatWarmthDem confThreatWarmthRep ///
>         using AppendixConjointQualtricsOLSConfidenceWarmthThreat.tex, ///
>         label replace   ///
>         interaction(" X ")   longtable ///
>         mtitles("Base" "Threat" "Warmth" ///
>          "Threat + Warmth" "Dem" "Rep") ///
>          title("Including Perceived Warmth and Threat") ///
>          addnote("First wave did not include question about hospital vulnerability. Ma
> jor corporations and banks treated interchangeably.")
(output written to AppendixConjointQualtricsOLSConfidenceWarmthThreat.tex)

. 
. log close
      name:  <unnamed>
       log:  /Users/paulmusgrave/Dropbox/0001 Academic Projects/Ongoing/0148 The Cyber/P
> osted/FPA Version/Work/Logs/Figure4Figure5Log.log
  log type:  text
 closed on:  25 Aug 2021, 10:37:09
----------------------------------------------------------------------------------------
